;; K5_1_red_triangle.aem 
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;; Author: Michael Stephen Fiske 
” T= { {1,2,3}, {1,2,4}, {1,2,5}, {1,3,4}, {1,3,5}, 
HF {2,3,4}, {2,3,5}, {2,4,5}, {3,4,5} 


{1,4,5}, 
}. 
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;; Meta commands keep the "red" elements firing: R_12 R_15 R_23 R_34 


That is, the meta commands help store the red states of a computation. 
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Meta commands repeatedly keep the "blue" elements firing : 
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B_13 B_14 B_24 
That is, the meta commands help store the blue states of a computation. 


(meta (name B_13) (window @ 1) 

(connection (time 0) (from B_13) (to B_13) (amp 2) (width 1-dT) (delay 1))) 
(meta (name B_14) (window @ 1) 

(connection (time 0) (from B_14) (to B_14) (amp 2) (width 1-dT) (delay 1))) 
(meta (name B_24) (window @ 1) 

(connection (time @) (from B_24) (to B_24) (amp 2) (width 1-dT) (delay 1))) 
(meta (name B_25) (window @ 1) 

(connection (time @) (from B_25) (to B_25) (amp 2) (width 1-dT) (delay 1))) 
;}. FIRING RED edges are named Rij. {12, 15, 23, 34, 35, 45}. 
(element (time -dT) (name R_12) (threshold 1) (refractory 1) (last -1)) 
(element (time -dT) (name R_15) (threshold 1) (refractory 1) (last -1)) 
(element (time -dT) (name R_23) (threshold 1) (refractory 1) (last -1)) 
(element (time -dT) (name R_34) (threshold 1) (refractory 1) (last -1)) 
(element (time -dT) (name R_35) (threshold 1) (refractory 1) (last -1)) 
(element (time -dT) (name R_45) (threshold 1) (refractory 1) (last -1)) 


(fire (time @) (name R_12) 
(fire (time @) (name R_15)) 
(fire (time @) (name R_23)) 
(fire (time @) (name R_34)) 
(fire (time @) (name R_35)) 
(fire (time @) (name R_45)) 


;; NON-FIRING RED edges are named R_ij {13, 14, 24, 25} 


(element (time -dT) (name R_13) (threshold 1) (refractory 1) (last -1)) 
(element (time -dT) (name R_14) (threshold 1) (refractory 1) (last -1)) 
(element (time -dT) (name R_24) (threshold 1) (refractory 1) (last -1)) 
(element (time -dT) (name R_25) (threshold 1) (refractory 1) (last -1)) 
:; FIRING BLUE edges are named Bij 

(element (time -dT) (name B_13) (threshold 1) (refractory 1) (last -1)) 
(element (time -dT) (name B_14) (threshold 1) (refractory 1) (last -1)) 
(element (time -dT) (name B_24) (threshold 1) (refractory 1) (last -1)) 
(element (time -dT) (name B_25) (threshold 1) (refractory 1) (last -1)) 


;1 fire element B_jk if edge {j, k} is blue where j < k. 


(fire (time @) (name B_13)) 

(fire (time @) (name B_14)) 

(fire (time @) (name B_24)) 

(fire (time @) (name B_25)) 

;; NON-FIRING BLUE edges are named B_ij 112, 15, 23, 34, 35, 45} 
(element (time -dT) (name B_12) (threshold 1) (refractory 1) (last -1)) 
(element (time -dT) (name B_15) (threshold 1) (refractory 1) (last -1)) 
(element (time -dT) (name B_23) (threshold 1) (refractory 1) (last -1)) 
(element (time -dT) (name B_34) (threshold 1) (refractory 1) (last -1)) 
(element (time -dT) (name B_35) (threshold 1) (refractory 1) (last -1)) 
(element (time -dT) (name B_45) (threshold 1) (refractory 1) (last -1)) 
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ea ae { {1,2,3}, {1,2,4}, {1,2,5}, {1,3,4}, {1,3,5}, 
HF {1,4,5}, {2,3,4}, {2,3,5}, {2,4,5}, 1{3,4,5} 
i }. 


;; Three connections are created for each potential blue triangle to 
;; determine if a blue triangle exists on vertices {i, j, k} where {i, j, k} 
7; Vvanges over T. 


i 


iy ijk = 123 

(connection (time @) (from B 
(connection (time 0) (from B 
(connection (time 0) (from B 


12) (to B_123) (amp 2) (width 1-dT) (delay 1)) 
23) (to B_123) (amp 2) (width 1-dT) (delay 1)) 
13) (to B_123) (amp 2) (width 1-dT) (delay 1)) 
77 ijk = 124 

(connection (time @) (from B_12) (to B_124) (amp 2) (width 1-dT) (delay 1)) 
(connection (time @) (from B_24) (to B_124) (amp 2) (width 1-dT) (delay 1)) 
(connection (time @) (from B_14) (to B_124) (amp 2) (width 1-dT) (delay 1)) 


ry Ajk = 125 

(connection (time ®) (from B 
(connection (time ®) (from B 
(connection (time 0) (from B 


12) (to B_125) (amp 2) (width 1-dT) (delay 1)) 
25) (to B_125) (amp 2) (width 1-dT) (delay 1)) 
15) (to B_125) (amp 2) (width 1-dT) (delay 1)) 


77 ijk = 134 

(connection (time @) (from B_13) (to B_134) (amp 2) (width 1-dT) (delay 1)) 
(connection (time @) (from B_34) (to B_134) (amp 2) (width 1-dT) (delay 1)) 
(connection (time @) (from B_14) (to B_134) (amp 2) (width 1-dT) (delay 1)) 


i; ijk = 135 

(connection (time @) (from B_13) (to B_135) (amp 2) (width 1-dT) (delay 1)) 
(connection (time @) (from B_35) (to B_135) (amp 2) (width 1-dT) (delay 1)) 
(connection (time @) (from B_15) (to B_135) (amp 2) (width 1-dT) (delay 1)) 


py ijk = 145 

(connection (time @) (from B_14) (to B_145) (amp 2) 1-dT) 1)) 
(connection (time @) (from B_45) (to B_145) (amp 2) (width 1-dT) (delay 1)) 
(connection (time @) (from B_15) (to B_145) (amp 2) 1-dT) 1)) 


77 ijk = 234 

(connection (time @) (from B_23) (to B_234) (amp 2) (width 1-dT) 1)) 
(connection (time @) (from B_34) (to B_234) (amp 2) (width 1-dT) (delay 1)) 
(connection (time @) (from B_24) (to B_234) (amp 2) (width 1-dT) 1)) 


iy ijk = 235 

(connection (time @) (from B_23) (to B 
(connection (time @) (from B_35) (to B 
(connection (time @) (from B_25) (to B 


77 ijk = 245 

(connection (time @) (from B_24) (to B_245) (amp 2) (width 1-dT) (delay 1)) 
(connection (time @) (from B_45) (to B_245) (amp 2) (width 1-dT) (delay 1)) 
(connection (time @) (from B_25) (to B_245) (amp 2) (width 1-dT) (delay 1)) 
i; ijk = 345 

(connection (time @) (from B_34) (to B_345) (amp 2) (width 1-dT) (delay 1)) 
(connection (time @) (from B_45) (to B_345) (amp 2) (width 1-dT) (delay 1)) 
(connection (time @) (from B_35) (to B_345) (amp 2) (width 1-dT) (delay 1)) 
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>; TEMPLATE: 

s3 (connection (time @) (from R_ij) (to R_ijk) (amp 2) (width 1) (delay 1)) 
;; (connection (time @) (from R_jk) (to R_ijk) (amp 2) (width 1) (delay 1)) 
;; (connection (time @) (from R_ik) (to R_ijk) (amp 2) (width 1) (delay 1)) 


;; Three connections are created for each potential red triangle to 
;; determine if a red triangle exists on vertices {i, j, k} where 
;; {i, j, k} ranges over T. 


77 ijk = 123 

(connection (time @) (from R_12) (to R_123) (amp 2) (width 1-dT) (delay 1)) 
(connection (time @) (from R_23) (to R_123) (amp 2) (width 1-dT) (delay 1)) 
(connection (time @) (from R_13) (to R_123) (amp 2) (width 1-dT) (delay 1)) 


77 ijk = 124 

(connection (time @) (from R_12) (to R_124) (amp 2) (width 1-dT) (delay 1)) 
(connection (time @) (from R_24) (to R_124) (amp 2) (width 1-dT) (delay 1)) 
(connection (time @) (from R_14) (to R_124) (amp 2) (width 1-dT) (delay 1)) 


77 ijk = 125 

(connection (time @) (from R_12) (to R_125) (amp 2) (width 1-dT) (delay 1)) 
(connection (time @) (from R_25) (to R_125) (amp 2) (width 1-dT) (delay 1)) 
(connection (time @) (from R_15) (to R_125) (amp 2) (width 1-dT) (delay 1)) 


77 ijk = 134 

(connection (time @) (from R_13) (to R_134) (amp 2) (width 1-dT) (delay 1)) 
(connection (time @) (from R_34) (to R_134) (amp 2) (width 1-dT) (delay 1)) 
(connection (time @) (from R_14) (to R_134) (amp 2) (width 1-dT) (delay 1)) 
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py ijk = 145 
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i; ijk = 235 
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i; ijk = 345 
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pppprprprprprprprprprrprrpvprprprvpvpvpvpveepererererererereperreveeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee 


Elements that represent each 3-clique (monochrome Triangle) 
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The triangles 


Element R_ijk 
Element B_ijk 
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fires when all 3 elements R_ij, R_jk, R_ik fired 
fires when all 3 elements B_ij, B_jk, B_ik fired 
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For each vertex set {i, j, k} (triangle) in T, the following elements are created. 
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